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Load database 
W1,b1,etc. 



Load an unknown Spectrum 
of the sample X 
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the relative intensity 
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Build an M dimensional vector space R m 
where M = data size 
Calculate local kernel functions 
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Calculate the o/p of the radial basis function 
A = exp-{d.+b1.) 2 

+ zz 

Calculate the o/p of the network 

I ZZ 

Find the best match 



SUBSTITUTE SHEET (RULE 28) 



WO 00/28573 n _ 

PCT/GB99/03694 



Fig. 10a 



&28 



Program Listing 



include <formatio.h> 
include <anaiysis.h> 

include < utriity.ii > 
include < ansi_c.h > 
include <userintJi> 
include "sampie4.h" 

#define NoData 125 
#define DataSize 16370 

static int panelHandie ; 

static int status ; 

static FILE *file_handle ; 

static char pathname [ MAX_PATHNAMEJ.EN I ; 

static char directory [ MAX_PATHNAME_LEN ] ; 

int Load_Sample_ok=0 ; 
int Load_DataSase_OK=0 ; 

int err ; 

/•double mean_value; 
double datapoints(100]; 
•/ 

double P[ DataSize]; 
double PJndex [ DataSize ] ; 

double w1 [ NoData ] [ DataSize ] ; 
double w2 [ NoData ] [ NoData ] ; 
double b1 [ NoData ] ; 
double b2[ NoData]; 

double a1 [ NoData ] , 

double a2{ NoData j; 
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double n[NoData]; 
double x[DataSizej; 
double y[DataSizej; 
double y2[DataSizej; 
double dist [ NoData ] ; 



int main ( int argc, char *argv [ ] ) 

{ 

if ( InitCVIRTE ( 0, argv, 0 ) = 0 ) t Needed if linking in external 
compiler; harmless otherwise •/ 

return -1 ; r out of memory */ 
if ( { panelHandle = LoadPanel { 0, " sampie4.uir \ PANEL ] ) , < 0 ) 

return -1; 

DisplayPanel ( panelHandle ) ; 
Runuserlnterface { ); 
return 0 ; 

} 

int CVICALLBACK Shutdown (int panel, int control, int event, 
void 'cailbackData, inteventDatal, int eventData2 ) 

{ 

switch (event) 
{ 

case EVENT_COMMIT: 
QuitUserlnterface ( 0 ) ; 
break; 

case EVENT_RIGHT_DOUBLE_CL!CK: 
break ; 

} 

return 0 ; 



SUBSTITUTE SHEET (RULE 26) 



WO00/28S73 PCT/GB99/03694 

8/28 

Fig. 10c 

int CViCALLBACK Shutdown (int panel, int control, int event, 
void *cailbaekData, inteventDatal, int eventData2 ) 

{ 

double norm ; 

int i=0 ; 
intj; 

double M, m; 
char buff 1 80 J; 

int err, s, q ; 

switch (event) { 

case EVENTCOMMIT: 

if ( Load_DataBase OK ) 
{ 

if (Load_Sampie OK ) 
{ 

DeleteGraphPlot ( panelHandie, PANELJVAVEFORIVL2, -1 

VALJMMEDIATEJ5RAW ) ; 

SetCtrlVal ( panelHandie, PANEL ..ELEMENT, " Searching, 

Please Waif); 

for (s=0; s<NoData; $+*) 

{ 

for { q=0 ; q<DataSize ; q++ ) 

{ 

x[q]*w1[s][q]; 
r x[q] = (x[q])*(x[q]-P[q]); 

dist[s] = distls] + x[q] ; 

*/ 

3 
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norm=0 ; 

SubID (x, P, DataSize, y); 
Mu!1D (y, y, DataSize. Y2); 
Sumld ( y2, DataSize, &norm ) ; 
nornpsqrt ( norm ) ; 
dist [s] = norm ; 



/* dist[s] = sqrt(dist[s] ); */ 

n(s] = dist[s]*b1[s] ; 
a1[s] = exp(-n[s]*n[s] ); 

r 

for ( q=0 ; q<NoData; q++ } 
{ 

a1[s] = w2[s]*a1[s] + b2ls]; 
r n[i]«n[i]'b; 

a1[il = exp(-n[i]*n[i]); 
datapoints [ i ] = rand ( ) / 32768.0 ; 
} 

7 

} 

MaxMinID (a1, NoData, &M, &i, &m, &j); 
QScalelD (a1, NoData, a1, &M); 
H+1 ; 

PlotY ( panelHandle, PANEL_WAVEFORM_2, a1, NoData, 
VAL_DOUBLE, VALTHIN LINE, VAL.EMPTY.SQUARE, 
VAL.SOLID, 1, VAL.WHITE); 

switch (j) 

{ 

caseO: 

Fmt ( buff. "%s ( %d )" , "No Sample was selected" , i ) ; 
SetCtrlVal ( panelHandle, PANEL.ELEMENT, buff); 



break : 
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case 1: 

Fmt ( buff, " %s ( %d ) V Acina, Element No. " , i ) ; 
SetCtrtVal ( panelHandie, PANEL JELEMENT, buff); 

break; 
case 2: 

Fmt ( buff. • %s ( %d ) V alcal, Element No. " , i ) ; 
SetCtrlVal ( paneiHandle, PANELJELEMENT, buff); 

break; 
case 3: 

Fmt ( buff, " %s ( %d ) ' , " baccer, Element No. " i ) ; 
SetCtrlVal (paneiHandle, PANEL_ELEMENT, buff); 

break; 
case 4: 

Fmt ( buff, " %s ( %d ) " , " baccer2, Element No. ' , i ) ; 
SetCtrlVal (paneiHandle, PANELJELEMENT, buff); 

break; 
case 5: 

Fmt ( buff, " %s ( %d ) * , * bacmy, Element No." , i); 
SetCtrlVal (paneiHandle, PANELJELEMENT, buff); 

break; 
case 6: 

fmt ( Duff, " %s ( %d ) " , " bacsub, Element no. " , i ) ; 
SetCtrlVal (paneiHandle, PANEL.ELEMENT, buff); 
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break ; 
case 9: 

Fmt ( buff, • %s { %d ) ' , " citd, Element No. ■ , i ) ; 
SetCtriVal (panelHandle, PANELJELEMENT, buff); 

break ; 

case 8: 

Fmt ( buff, - %s ( %d ) " , " citd2, Element No. " , i ) ; 
SetCtriVal ( panelHandle, PANEL_ELEMENT, buff); 

break ; 
case 9: 

Fmt ( buff, " %s ( %d ) " , " citf, Element No. " , i ) ; 
SetCtriVal (panelHandle, PANEL.ELEMENT, ttff); 

break ; 

case 10: 

Fmt ( buff, ■ %s ( %d ) \ • citf2, Element No. " , i ) ; 
SetCtriVal ( panelHandle, PANELELEMENT, buff) ; 

break ; 

case 11: 

Fmt ( buff, " %s ( %d ) ' , " citf3, Element No. ' , i ) ; 

SetCtriVal (panelHandle, PANEL.ELEMENT, buff); 

break ; 
case 12: 
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Fmt ( buff, " %s ( %d ) \ " ecoiil , Element No. " , i ) ; 
SetCtrlVal ( panelHandle, PANEL_ELEMENT, buff); 

break; 

case 13: 

Fmt ( buff, " %s ( %d ) " , " ecoli2, Element No. ' , I ) ; 
SetCtrlVal (panelHandle, PANEL_ELEMENT, buff); 

break; 

case 14: 

Fmt ( buff, " %s ( %d ) • , ' ecoli3, Element No. * , i ) ; 
SetCtrlVal (panelHandle, PANEL_ELEMENT, buff); 

break ; 
case 15: 

Fmt ( buff, ' %s ( %d ) * , " ecoli4, Element No. " , i ) ; 
SetCtrlVal (panelHandle, PANEL.ELEMENT, buff); 

break; 

case 16; 

Fmt ( buff, " %s ( %d ) " , " ecoli26, Element No. " , i ) ; 
SetCtrlVal (panelHandle, PANEL_ELEMENT, buff); 

break ; 

case 17: 

Fmt (buff, "%s (%d)Vecoli27, Element No." , I); 
SetCtrlVal (panelHandle, PANEL_ELEMENT, buff); 

break ; 
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case 18: 

Fmt ( buff, ' %s ( %d ) \ " ecoli28, Element No. " , i ) ; 
SetCWVal ( panelHandle, PANEL.ELEMENT, buff); 

break ; 
case 19: 

Fmt ( buff, " %s ( %d ) " , " ecoli29, Element No. " , i ) ; 
SetCtrlVal (panelHandle, PANEL.ELEMENT. buff); 

break ; 

case 20: 

Fmt ( buff, " %s { %d ) " , ' ecoli30, Element No. " i ) ; 

SetCtrlVal (panelHandle, PANEL_ELEMENT, buff); 

break; 
case 21: 

Fmt ( buff, • %s ( %d ) ' , " ecoli31 , Element No. " , i ) ; 
SetCtrlVal (panelHandle, PANEL.ELEMENT, buff); 

break ; 
case 22: 

Fmt (buff, "%s (%d)\"ecoli32, Element No." , i); 
SetCtrlVal (panelHandle, PANEL_ELEMENT, buff); 

break; 

case 23: 

Fmt ( buff, • %s ( %d ) " , " ecoIi33, Element No. ' , i ) ; 
SetCtrlVal (panelHandle, PANEL.ELEMENT, buff); 
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break ; 
case 24: 

Fmt ( buff, * %s ( %d ) " , " ecoli34, Element No. " , i ) ; 
SetCtrlVal (panelHandle, PANELELEMENT, buff); 

break ; 

case 25: 

Fmt ( buff, " %s ( %d ) * , ' ecoii35, Element No. 'J); 
SetCtrlVal (panelHandle, PANEL,ELEMENT, buff) ; 

break; 

case 26: 

Fmt ( buff, ' %s ( %d ) ' , ' ent Element No." . i); 
SetCtrlVal (panelHandle. PANEL_ELEMEN!T, buff); 

break ; 

case 27: 

Fmt ( buff, • %s ( %d ) " , ' arte, Element No. " , i ) ; 
SetCtrlVal (panelHandle, PANEL.ELEMENT, buff); 

break; 

case 28: 

Fmt ( buff, " %s ( %d ) ' entd, Element No. " , i ) ; 
SetCtrlVal (panelHandle, PANEL.ELEMENT, buff); 
break ; 

case 29: 
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Fmt ( buff, • %s ( %d )',' errtf. Element No. " , f ) ; 
SetCtrlVal (panelHandle, PANEL.ELEMENT, buff); 

break; 

case 30: 

Fmt ( buff, " %s ( %d ) " , " entf2, Element No. " , i ) ; 
SetCtrlVal (panelHandle, PANELELEMENT, buff); 

break ; 

case 31: 

Fmt (buff, '%s (%d)Vent3, EtementNo." , i); 
SetCtrlVal (panelHandle, PANEL.ELEMENT, buff); 

break; 

case 32: 

Fmt ( buff, ■ %s ( %d ) " , " entf4, Element No. " , i ) ; 
SetCtrlVal (panelHandle, PANEL.ELEMENT, buff); 

break ; 

case 33: 

Fmt ( buff, • %s ( %d ) " , " entfS, Element No. - , i ) ; 
SetCtrlVal (panelHandle, PANEL_ELEMENT, buff); 

break ; 

case 34: 

Fmt ( buff, " %s ( %d ) v , " entf6, Element No. " , i ) ; 
SetCtrlVal (panelHandle, PANELJELEMENT, buff); 

break; 
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case 35: 

Fmt ( buff, " %s ( %d ) " , " entf7, Element No. " , i ) ; 
SetCtrlVal (panelHandle, PANEL.ELEMENT, buff); 

break ; 
case 36; 

Fmt ( buff, * %s ( %d ) " , ' entvre, Element No. " , i ) ; 
SetCtrlVal (panelHandle, PANEL_ELEMENT, buff); 

break ; 

case 37: 

Fmt (buff, *%s (%d)Vgon1, Element No." , i); 
SetCtrlVal (panelHandle, PANEL.ELEMENT, buff); 

break; 

case 38; 

Fmt ( buff, " %s ( %d ) " , u gon2, Element No. " , i ) ; 
SetCtrlVal (panelHandle, PANEL.ELEMENT, buff); 

break ; 

case 39: 

Fmt ( buff, ' %s ( %d ) " , " rtafalv, Element No. " . i ) ; 
SetCtrlVal (panelHandle. PANEL_ELEMENT, buff); 

break; 

case 40: 

Fmt ( buff, * %a ( Tod ) • , * Keba, Element No. "J); 
SetCtrlVal (panelHandle, PANEL.ELEMENT, buff); 
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break; 
case 41; 

Fmt ( buff, " %s ( %d ) " , " listg, Element No. " , i ) ; 
SetCtrlVal ( panefHandle, PANEL.ELEMENT, buff); 

break ; 

case 42: 

Fmt ( buff, " %s ( %d ) " , ' listi, Element No. " , i ) ; 
SetCtrlVal ( paneiHandle, PANEL.ELEMENT, buff}; 

break; 

case 43: 

Fmt ( buff, - %s ( %d ) " , " listm, Element No." , i); 
SetCtrlVal (paneiHandle, PANELJELEMENT, buff); 

break ; 

case 44: 

Fmt { buff, " %s ( %d ) " , * Iistm3, Element No. ", i ) : 
SetCtrlVal (paneiHandle, PANEL.ELEMENT, buff); 

break; 

case 45; 

Fmt ( buff, " %s ( %d ) \ " Iistm4, Element No. \ i ) ; 
SetCtrlVal (paneiHandle, PANEL.ELEMENT, buff); 
break ; 

case 46: 
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Fmt ( buff, " %s ( %d ) ' , " listmu, Element No ' i ) ■ 
SetCtrlVal ( panelHandle, PANEL.ELEMENT, buff);' 

break ; 
case 47: 

Fmt ( buff, " %s ( %d ) • , 1 mening 1 , Element No. " i ) • 
SetCtrlVal { panelHandle, PANEL.ELEMENT, buff ) ; 

break ; 
case 46: 

Fmt ( buff, " %s ( %d ) \ * mening2, Element No. * , i ) ■ 
SetCtrlVal (panelHandle, PANEL_ELEMENT, buff); 

break : 
case 49: 

Fmt ( buff, * %s ( %d ) • , " nelong, Element No. " , 1 ) ; 
SetCtrlVal (panelHandle, PANEL__ELEMENT, buff); 

break; 
case 50: 

Fmt (buff, "%s (%d) Vnflavl, Element No." , i); 
SetCtrlVal (panelHandle, PANEL_ELEMENT, buff); 

break ; 
case 51: 

Fmt ( buff, ■ %s ( %d ) " , " rtiav2, Element No. M , i ) ; 
SetCtrlVal (panelHandle, PANEL.ELEMENT, buff); 

break; 
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case 52: 

Fmt ( buff, ' %s ( %d ) " , ' nsicca, Bement No. " , i ] ; 
SetCtrlVal (panelHandle, PANELELEMENT, buff); 

break ; 

case 53: 

Fmt ( buff, " %s ( %d ) \ " prol , Element No. ' , i } ; 
SetCtrlVal ( panelHandle, PANEL.ELEMENT, buff); 

break; 

case 54: 

Fmt (buff, "%s (%d)","pro2, EtementNo." , H; 
SetCtrlVal ( paneiHandie, PANELELEMENT, Duff); 

break ; 

case 55: 

Fmt ( buff. * %s { %d ) " , " pro3, Element No. " , i ) ; 
SetCtrlVal (panelHandle, PANELELEMENT, buff); 

break; 

case 56: 

Fmt ( buff, " %s ( %d ) \ " provl, Element No. " , i ) ; 
SetCtrlVal (panelHandle, PANELELEMENT, buff); 

break ; 

case 57: 

Fmt ( buff, " %s ( %d ) " , " pseui , Element No. " , i ) ; 
SetCtrlVal (panelHandle, PANEL.ELEMENT, buff); 
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break; 
case 58: 

Fmt ( buff, " %s ( %d ) " , " pseua2. Element No. " , i ) ; 
SetCtrlVal ( paneiHandle, PAN£L_ELEMENT, buff); 

break ; 
case 59: 

Fmt ( buff, ' %s { %d ) " , " pseua3, Element No. " , i ) ; 
SetCtrlVal (paneiHandle, PANEL.EIEMENT, j-jfi); 

break ; 

case 60: 

Fmt ( buff, " %s ( %d ) \ " sal, Element No. • , i ) ; 
SetCtrlVal (paneiHandle, PANEL.ELEMENT, buff); 

break ; 
case 61: 

Fmt ( buff, " %s ( %d ) M , " salgl, Element No. \ i ) ; 
SetCtrlVal (paneiHandle, PANEL_ELEMENT, buff); 

break ; 

case 62: 

Fmt ( buff, • %s ( %d ) * , " salglO, Element No. • , i ) ; 
SetCtrlVal (paneiHandle, PANEL.ELEMENT, buff); 
break ; 

case 63: 
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Fmt ( buff, ' %s ( %d ) \ ' salg78, Element No. " , i ) ; 
SetCtriVal (panelHandle, PANEL.ELEMENT, buff}; 

break; 

case 64: 

Fmt { buff, * %s ( %d ) " salt2, Element No. " , i ) ; 
SetCtriVal (panelHandle, PANELELEMENT, buff)- 

break ; 

case 65: 

Fmt ( buff, " %s ( %d ) n , ■ sattyp. Bement No. ' . i ) ; 
SetCtriVal (panelHandle, PANEL.ELEMENT, buff); 

break ; 

case 66: 

Fmt ( buff, " %s ( %d ) " , " saltypl , Element No. " , i); 
SetCtriVal (panelHandle, PANEL.ELEMENT, buff); 

break; 

case 67: 

Fmt ( buff, " %s ( %d ) \ ■ serrat Element No. " , i ) ; 
SetCtriVal (panelHandle, PANEL.ELEMENT, buff); 

break ; 
case 68: 

Fmt ( buff, * %s ( %d ) ' , " shig, Element No. " , i ) ; 
SetCtriVal (panelHandle, PANEL.ELEMENT, buff); 



break; 
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case 69: 

Fmt ( buff, ■ %s ( %d ) \ " staphal, Element No. " , i ) ; 
SetCtrlVai ( paneiHandie, PANELELEMENT, buff); 

break ; 
case 70: 

Fmt (buff, -%s ( %d ) " , " stapha2, Element No." , i); 
SetCtrlVai (paneiHandie, PANELELEMENT, buff); 

break ; 

case 71: 

Fmt ( buff, " %s ( %d ) * , * stapha3. Element No. " , t ) ; 
SetCtrlVai (paneiHandie, PANEL_EIEMENT, buff); 

break; 

case 72: 

Fmt ( buff, " %s { %d ) " , " strepl, Element No. " , i ) ; 
SetCtrlVai (paneiHandie, PANEL JELEMENT, buff); 

break ; 

case 73; 

Fmt ( buff, " %s ( %d ) \ " strep2, Element No. " , i ) ; 
SetCtrlVai (paneiHandie, PANEL.ELEMENT, buff); 

break ; 
case 74: 

Fmt (Duff, ■%s (%d)\"becol6ki, Element No." , i) 
SetCtrlVai (paneiHandie, PANEL_ELEMENT, buff); 
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break ; 
case 75: 

Fmt ( buff, " %s ( %d ) " , " beco16k2, Element No. " , i ) ; 
SetCWVal (panelHandle, PANEL.ELEMENT, buff); 

break; 

case 76: 

Fmt ( buff, ■ %s ( %d ) " , ' beco16k3, Element No. " , i } ; 
SetCtriVal (panelHandle, PANEL,EIEMENT, buff); 

break; 
case 77: 

Fmt ( buff, " %s ( %d ) ', * beco16k4, Element No. " , i ) ; 
SetCtriVal (panelHandle, PANEL_ELEMENT, buff); 

break ; 

case 78: 

Fmt ( buff, ' %s ( %d ) \ " psta16k1, Element No." , i); 
SetCtriVal (panelHandle, PANEL-ELEMENT, buff); 

break; 

case 79: 

Fmt ( buff, " %s ( %d ) " , " psta16k2, Element No. " , t ) ; 
SetCtriVal (panelHandle, PANEL.ELEMENT, buff); 
break; 

case 80: 
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Fmt ( buff, • %s ( %d J " , • psta16k3, Element No. " , i ) 
SetCtrlVal ( paneiHandle, PANEL.ELEMENT, buff); 

break; 

default: 

Fmt ( buff, " %s ( %d ) " , • Unknown, Element No. • , i ) 
SetCtrlVal (paneiHandle, PANEL_ELEMENT, buff): 

break ; 

} 

YGraphPopup ( " Result of Search Engine for the Selected Sample 
at. NoData, VAL.DOUBLE ) ; 

else 
{ 

MessagePopup ( " SAMPLE " Please Load a Sample First * ) ; 
} 

else 

{ 

MessaagePopup ( • DATA BASE " Please Load the Data Base First " ) ; 
} 

break ; 

case EVENT_RIGHT_DOUBLE_CLICK: 

} 
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return 0 ; 

] 

int CVICALLBACK LoadDataBase (int panel, int control, int event, 
void "cailbackData, inteventDatal, int eventData2 ) 

{ 

int s, q, num ; 
switch (event) 
{ 

case EVENT_COMMIT: 
SetCtriVal ( panelHandle, PANEL.EIEMENT, " Loading, Please Wait ") ; 
GetProjectDir ( pathname ) ; 

status = FileSelectPopup ( directory, " wlOO.mat *, " \Mat ( Mat file ) 

" Data File ", VAL_LOAD_BUTTON, o, 0, 1, 0, 
pathname ) ; 

if (status !=VAL_NO FILE_SELECTEO ) 
{ 

fiiejiandie = fopen (pathname, "r"); 

for ( s=0 ; $<NoData ; s++ ) 

{ 

for ( q=0 ; q<DataSize ; q++ ) 
{ 

num = fscanf ( filejandie, " %1f &w1 [ s ] [ q ] ) ; 

} 

} 

fclose ( fiiejiandie ) ; 
Load_DataBase_OK=1 ; 

} 

else 

{ 
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Load_DataBase_OK=0 ; 
} 



GetProjectDir ( pathname ) ; 

status = RleSelectPopup ( directory, • b100.mat " f " *.Mat ( Mat file ) " , 

"Data File VAL_LOAD_BUTTON, 0, 0, 1, 0, 
pathname ) ; 

if (status ! = VAL.NO FILE SELECTED) 

{ 

file_hand!e = fopen (pathname, "r"); 

for ( s=0 ; s<NoData ; s++ ) 

{ 

num = fscanf ( filejiandle, " %1f &b1 [ s ] ) ; 

} 

fclose ( file handle } ; 

} 

else 
{ 

Load_DataBase_ok=0 ; 
} 

SetCtrlVal ( panelHandle, PANELJ-LEMENT, " Load a sample or search ") ; 
break ; 

case EVENT J*IGHT_DOUBLE_CLICK: 
break ; 

} 

return 0 ; 

} 



int CVICAALLBACK Load_Sampie (int panel, int control, int event, 
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^ void 'calibackData, inleventDatal, int eventData2 ) 

int i, num. pmaxjndex, pminjndex ; 
double pmax, pmin ; 
switch (event) 
{ 

case EVENT_COMMIT: 

DeletGraphPlot ( paneiHandle, PANELJVAVEFORM, -1, 

VALJMMEDIATE.DRAW); 

SetCtriVai (paneiHandle, PANELELEMENT, 'Loading, Please Wait "j; 

GetProjectDir ( pathname ) ; 

status = RleSeiectPopup ( directory, " M6k " \dat ( data.dat ) 

* Data Rle VAL_LOAD_BUTTON, 0, 0, 1, 0, 
pathname ) ; 

if (status ! = VAL_NO FILE_SELECTED ) 
{ 

filejiandle = fopen ( pathname, " r " ) ; 

for ( i=0 ; i<DataSize ; i++ ) 

{ 

num = fscanf (filejandle,"%1f%1f\n' l &P_index [i], &P[i]); 
} 

fciose ( fiie.handle ) ; 
Load_Sampfe_OK=1 ; 

SetCtriVai ( paneiHandle, PANELELEMENT, " Unknown Sample " ) ; 

MaxMinID ( P, DataSize, Spmax, &pmaxjndex, &pmin, &pmin_index ) ; 
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QScalelD ( P, DataSize, PJndex, &pmax ) ; 

for ( i=0 ; i<Datasize ; i++ ) P [ i ] = 3000 * PJndex [ i ] ; 

PtotY (paneJHandie, PANELWAVEFORM, PJndex, DataSize, 
VAL DOUBLE, VAL THINJJNE, VAL_EMPTY_SQUARE, 
VAL_SOUD, 1, VAL_YELLOW); 

r PlotY (panelHandie, PANELWAVEFORM, P, DataSize, VAl DOUBLE, 
VALJFHINJJNE, VAL_EMPTY_SQUARE, VAL,SOUD, 1, 
VAL_YELLOW ) ; 

r SetAxisScaiingMode (panelHandie, PANELWAVEFORM, VAL.XAXIS, 

VALJMANUAL, 500, 10000 ) ; 
r SetAxisRange (panelHandie, PANELWAVEFORM, VAL_NO_CHANGE, 

500, 10000, VAL_AUTOSCALE, 0.0, 1.0); 

*/ 
} 

else 
{ 

Load_SampieJ)K=0 ; 
} 

break; 

case EVENT_R!GHT_DOUBLE_CUCK: 
break; 

} 

return 0 ; 

} 



SUBSTITUTE SHEET (RULE 26) 



